home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 53
/
053.d81
/
customizer boot
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
2KB
|
38 lines
10 rem font customizer booter
20 ifc>0then150
30 gosub500 :poke53281,15:poke53280,15
40 print"[147][144]please wait while loading"
150 ifc=0thenc=1:load"cust.ml1",8,1
160 ifc=1thenc=2:load"cust.ml2",8,1
170 print"[147]"tab(11);
180 print"[204]oading"chr$(34)"[195]ustomizer"chr$(34)"";
190 print"[155]poke44,64:poke46,64
200 [153]"poke 48,64:poke 50,64:poke 16384,0:new"
205 [153]"load"[199](34)"cust.font"[199](34)",8,1"
210 [153]"load"[199](34)"customizer"[199](34)",8"
220 [153]"run"
230 [129]i[178]1[164]5:[151]630[170]i,13:[130]:[151] 198,5
300 [128]
500 [151]53280, 6:[151]53281, 0:[151]53265,[194](53265)[175]239:[153][199](142)"loadreturn";
501 [153]"listsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrpokesqrlistsqrsqrsqrsqrpokesqrsqr ";
502 [153]" pokesqrsqrlistsqrsqrpokesqrsqrsqrsqrlistsqrsqrsqrpokesqrlistsqrpokesqrlistsqrsqrsqrpokesqrlistsqr loadstar presents listsqrsqrsqrsqrpokesqrlistsqrsqrsqrsqrsqrpokesqrlist";
503 [153]"sqrsqrsqrpokesqrlistsqrsqrpokesqrsqr pokesqrlistsqrsqrsqrpokesqrsqrsqrlistsqrsqrsqrpokesqrsqrsqrsqrsqrlistsqrsqrpokesqrlistsqrsqrsqrpokesqrlistsqrsqrpokesqrlistsqrsqr";
504 [153]"sqrpokesqrlistsqrsqrpokesqrlistsqrsqrsqrpokesqrlistsqrsqrpokesqrlistsqrsqrsqrsqrsqrpokesqrlistsqrsqrsqrsqrsqrpokesqrlistsqrsqrsqrpokesqrlistsqrsqrpokesqrlistsqrsqrsqrpokesqrlistsqrsqrpokesqrlistsqrsqrsqrpokesqrlistsqrsqrpokesqrlistsqrsqrsqr";
505 [153]"pokesqrlistsqrsqrpokesqrlistsqrsqrsqrsqrsqrpokesqrlistsqrsqrsqrsqrsqrpokesqrlistsqrsqrsqrpokesqrlistsqrsqrpokesqr pokesqrlistsqrsqrpokesqrlistsqrsqrsqrsqrsqrsqr";
506 [153]"sqrsqrsqrsqrsqrsqrsqr font customizer listsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrpokesqrsqrsqrlistsqrsqrsqrpokesqr tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(tab(";
507 [153]" pokesqrlistsqrsqrpokesqrlistsqrsqrsqrsqrsqrpokesqrlistsqrsqrsqrpokesqrlistsqrsqrpokesqrclose listsqrsqrsqrpokesqrlistsqrsqrsqrsqrsqrpokesqrlistsqrsqrsqr";
508 [153]"sqrsqrsqrpokesqr written by listsqrsqrsqrpokesqrlistsqrsqrsqrsqrsqrpokesqrlistsqrsqrpokesqrsqrlistsqrsqrpokesqrclose roger m";
509 [153]"oore listsqrsqrsqrpokesqrlistsqrsqrsqrsqrsqrpokesqrlistsqrsqrsqrpokesqrlistsqrsqrpokesqr listsqrsqrsqrpokesqrlistsqrsqrsqrsqrsqrsqrpokesqrsqrsqr";
510 [153]"listsqrsqrsqrpokesqrlistsqrsqrsqrpokesqrlistsqrsqrsqrpokesqrsqrsqrlistsqrsqrsqrsqrpokesqrsqrlistsqrsqrsqrsqrpokesqrlistsqrsqrpokesqrlistsqrsqrpokesqrsqrsqrsqrlistsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqr";
511 [153]"sqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrsqrpokesqrsqrlistsqrpokesqrsqrlistsqrsqrpokesqr";
512 [153]"listsqrsqrprint listsqrpokesqrsqrsqrlistsqrsqrpokesqrsqrsqrlistsqrsqrsqrpokesqrsqrsqrsqrsqrlistsqrsqrpokesqrsqrlistsqrprint copyright 1988 ";
513 [153]"pokesqrlistsqrsqrsqrpokesqrlistsqrpokesqrlistsqrsqrpokesqrlistsqrsqrpokesqrlistsqrpokesqrlistsqrpokesqrlistsqrsqrpokesqrsqrsqrprint pokesqrlistsqrsqrsqrpokesqrlistsqrpokesqrlistsqrsqrpoke";
514 [153]"sqrlistsqrsqrpokesqrlistsqrsqrsqrpokesqrlistsqrsqrpokesqrlistsqrpokesqrsqrsqrlistsqrsqrpokesqrlistsqrsqrsqrpokesqrlistsqrsqrpokesqrsqrsqrsqrlistsqrsqrsqrpokesqrlistsqrpokesqrlistsqrpokesqrlistsqrpokesqrsqrsqrlistsqrsqrsqrpokesqrlistsqrsqrsqr";
515 [153]"pokesqrlistsqrsqrpokesqrlistsqrsqrpokesqrsqrlistsqrsqrpokesqrlistsqrsqrsqrpokesqrlistsqrsqrpokesqrlistsqrsqrsqrsqrsqrsqrpokesqrlistsqrsqrpokesqrsqrlistsqrpokesqrlistsqrsqrpokesqrlistsqrsqrpokesqrlistsqrsqrsqrpokesqrlistsqrsqrdef ";
516 [153]" pokesqrsqrsqrlistsqrsqrpokesqrlistsqrsqrsqrsqrsqrsqrsqrsqrsqrdef press space to continue listsqrsqrsqrsqrsqr";
517 [153]"sqrsqrsqrsqrsqrsqrsqrsqrsqrsqrdef listsqrsqrsqrsqrsqrsqrsqrsqrsqrpokesqrsqrsqrlistsqrsqrsqrpokesqrsqrsqrsqrsqrlistsqrsqrpokesqrlistsqrsqrsqrpokesqrlist";
518 [153]"sqrsqrpokesqrlistsqrsqrsqrpokesqrlistsqrsqrpokesqrlistsqrpokesqrlistsqrpokesqrlistsqrpokesqrlistsqrsqrpokesqr"
520 [151]2023,122[170]128:[151]56295,15 :[151]53265,[194](53265)[176]16
525 [161]a$:[139]a$[179][177]" " [167] 525
530 [142]